home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Just Call Me Internet
/
Just Call Me Internet.iso
/
prog
/
atari
/
m2
/
cat3src
/
cat
/
zcalccrc.d
< prev
next >
Wrap
Text File
|
1997-10-26
|
529b
|
21 lines
DEFINITION MODULE ZCalcCrc;
(*$Z+*)
FROM CatTypes IMPORT BigTextPtr;
PROCEDURE CalcCrc(REF str : ARRAY OF CHAR):CARDINAL;
(* str 0C terminated *)
PROCEDURE CalcCrcArray(a : BigTextPtr; howMuch : CARDINAL):CARDINAL;
PROCEDURE crc32(adr : BigTextPtr; howMuch : CARDINAL) : LONGCARD;
PROCEDURE CalcIdCrc (REF str: ARRAY OF CHAR): CARDINAL;
(* Berechnet eine CRC ber eine ID. Dabei wird der domain-part
* der ID nach Upcase gewandelt, da dieser case-insensitiv
* behandelt werden soll
*)
END ZCalcCrc.